hispanic_complete_geo %>%
filter(year==2019) %>%
mutate(treated_char=as.character(treated)) %>%
mapview(zcol="treated_char",
layer.name="Medicaid expansion state, 2019")
black_complete_geo %>%
filter(year==2019) %>%
mutate(treated_char=as.character(treated)) %>%
mapview(zcol="treated_char",
layer.name="Medicaid expansion state, 2019")